package com.seal.commons.utils;

/**
 * 校验规则：
 *  1、从卡号最后一位数字开始，逆向将奇数位(1、3、5等等)相加。<br/>
 *  2、从卡号最后一位数字开始，逆向将偶数位数字，先乘以2（如果乘积为两位数，将个位十位数字相加，即将其减去9），再求和。<br/>
 *  3、将奇数位总和加上偶数位总和，结果应该可以被10整除
 *
 * @author yong.huang
 * @see
 * @since JDK 1.8
 */
public class BankCardNumberUtils {


    /**
     * 校验银行卡卡号
     * 从不含校验位的银行卡卡号采用 Luhm 校验算法获得校验位
     * 405512 交通银行卡例外
     * @param cardId
     * @return
     */
    public static boolean isBankCardNumber(String cardId) {
        char bit = getBankCardCheckCode(cardId.substring(0, cardId.length() - 1));
        if(bit == 'N'){
            return false;
        }
        boolean result=cardId.charAt(cardId.length() - 1) == bit;
        /**
         * 交通银行卡例外
         */
        if(!result && cardId.startsWith("405512") && cardId.length()==17){
            result=true;
        } else if (!result && cardId.startsWith("259848") && cardId.length()==12) { //中国银行卡例外
            result=true;
        } else if (!result && cardId.startsWith("155646") && cardId.length()==12) {
            result = true;
        } else if (!result && cardId.startsWith("400002") && cardId.length()==19) { //中国银行卡例外
            result=true;
        } else if (!result && cardId.startsWith("621792") && cardId.length()==16) { //浦发银行例外
            result=true;
        } else if(!result && cardId.startsWith("110149") && cardId.length()==14) { //中国银行对公帐户
            result=true;
        } else if(!result && cardId.startsWith("020020") && cardId.length()==19) { //工商银行对公帐户
            result=true;
        }
        return result;
    }

    /**
     * 从不含校验位的银行卡卡号采用 Luhm 校验算法获得校验位
     * @param nonCheckCodeCardId
     * @return
     */
    private static char getBankCardCheckCode(String nonCheckCodeCardId){
        if(nonCheckCodeCardId == null || nonCheckCodeCardId.trim().length() == 0
                || !nonCheckCodeCardId.matches("\\d+")) {
            //如果传的不是数据返回N
            return 'N';
        }
        char[] chs = nonCheckCodeCardId.trim().toCharArray();
        int luhmSum = 0;
        for(int i = chs.length - 1, j = 0; i >= 0; i--, j++) {
            int k = chs[i] - '0';
            if(j % 2 == 0) {
                k *= 2;
                k = k / 10 + k % 10;
            }
            luhmSum += k;
        }
        return (luhmSum % 10 == 0) ? '0' : (char)((10 - luhmSum % 10) + '0');
    }
}
